home *** CD-ROM | disk | FTP | other *** search
/ Acorn RISC PD-CD 1 / Acorn RISC PD-CD 1.iso / utilities / _customise / ssavers / _lunch / _run < prev    next >
Encoding:
Text File  |  1992-08-14  |  485 b   |  19 lines

  1. | !Run file for Out to Lunch
  2. | © Peter Gaunt, 1992
  3.  
  4. Set Lunch$Dir <Obey$Dir>
  5.  
  6. if "<System$Path>" = "" then Error 0 System resources cannot be found
  7. RMEnsure ColourTrans 0.00 RMLOAD System:Modules.Colours
  8. RMENSURE ColourTrans 0.52 ERROR 'Colours' module not found or out of date
  9.  
  10. Run <Lunch$Dir>.LunchSetUp
  11.  
  12. Run <Lunch$Dir>.CountTasks
  13. Run <Lunch$Dir>.CheckALT
  14. IF ALT$Down THEN RUN <Lunch$Dir>.!RunConfig
  15.  
  16. UNSET ALT$Down
  17. RMLoad <Lunch$Dir>.Lunch
  18. If Desktop$NumTasks>1 THEN Desktop_Lunch
  19.